ESTE ANONCIO 
SO PODIA 
SER A CORES 




Voce esfa sendo apresentado ao unico 
monitor a cores fabricado no Brasil. 

E claro que toda a tecnologia 
desenvolvida para ele tambem esta 
presenfe no nosso modelo monocromatico. 

Sem improvisos, adaptagoes, ajustes ou 
arranjos. 

Um monitor projetado para funcionar 
como monitor. Design adequado as suas 
fungoes, grande cuidado na escolha de 
seus componentes, alta resolupao, enfim, 
atributos que atestam a nossa 
preocupapao de entrar nesse mercado 
para ficar. 

serie 14 MC (cores) 

serie 12 MV (monocromatico fosforo verde) 

VI DIECCCM PC 
Os monitores que chegaram para ficar. 

Compo do Brasil Industrie e Comercio ltda. 

Av. Mario Lopes Leao, 680 Fones (01 1) 5486280 e 5486267. 
CEP 04754. Santo Amaro. Sao Paulo, S.P. 

[Em expost gdo no 3° Feira internacional de Informplica. 
de 17 o 23 de ouiubro, Anhembi, enlre os ruas 8 e C.J 
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APRESENTAgAO 

Nossa revista semprc teve como meta principal, 
servir de vaicufo pare todos equates quo sSo "amantes da computa^ao", 
atravtis de tnformagoes da nivaf diditlco (procurando atingir, ao m4ximo, os interezses dos lei tores); 

da prestapao de services; 

de espapos dedicados a opinions , ttf&ias e cr ft teas de nossos (Qi tores, 
como tambem da divulgapao do potendai criativo 
pastes que tern o hobby da computapao. 

Dess# mere traps da e alcanpeda, extraimos esta pequena edipao 
batizada como nurnierp "X" 

onde tantamos condenser aiguns dos "melhores momantps" da MICROHOBBY at4 ouiubro de 83. 
A seguir, transmittmos, com pequena s explanapdes, a que 4 cada sepao de nossa revista : 



QUEBRA-CABEfpA - E a segao Eigada a 
MENS A INTERNATIONAL e que pre- 
tende desenvolver e agremiar membros 
para tao afamada instituigao (que agrega 
os altos tJ Gls" do mundo). Publlcamos, to- 
dos os mesas, urn Quebra-Cabega e aguar- 
damos as respostas enviadas. A melhor 
resposta serd premiada e publicada poste- 
riormente. 



PROGRAMAS DO LEITOR Esta segao 
existe para que o lei tor possa colaborar 
com MICROHOBBY atrav£s de seu "po* 
tenciat criativo" enviando-nos programas 
(de autona prdpria) especificando memd- 
ria a ser utllizada (IK, 2K, 16K, 64 KJ; 
expEicagao sobre o programa (se ele 6 di- 
datico, de aplicacao t^cmco-cientrfico ou 
administrative) e os simbolos graficos. 
Al£m de nome, endereco, telefone, for- 
magao, idade e profissao. Os programas 
publicados sao remunerados. 



DIC AS - Dicas uteEs aos leitores, para 
que estes possam amp t Ear seus conheci- 
mentos na utilizagao dos recursos ex Esten- 
tes no computador. 



DESGRILANDO - Desgrllando tembra 
" grifo ** t e foi pensando em resolver os 
"griios" de nossos lei tores, que criamos 
esta segao. Ela existe para prestar servi- 
gos, relacionados a duvidas e problemas 
encontrados pelos que IGem MICRO- 
HOBBY. 



HOBBY -- Uma sepao onde apresentamos 
projetos para execugao, servindo de 
opgao para aqueles que possuem como 
hobby a construgao de perlf^ricos e 
outros acessorios para computador. Sele- 
clonamos os meihores projetos e possibil i- 
tamos a publicagao dos meEhores projetos 
na revEsta. 



PROGRAMA DO M£S - Atrav^s de uma 
selepao criteriosa, escolhemos um progra- 
ma ou mais, que seja suficientemente in- 
teressante para nosso publico lei tor e o 
publicamos. Aguardamos. depois, os co- 
ment^rios envlados a nossa redapao e os 
respondemos, na sepao Carta dos Leitores. 



CARTAS DOS LEITORES -do espafo 
reservado para voc£ tecer suas cnticas e 
tambem os elogios a nossa revlsta. 



NOVIDADES — O que ocorre no mundo 
da informatics, novidades do mercado, 
promocoes, Enovagoes e tudo que diz res- 
pelto ao "nosso'' fantastico mundo, que 
£ o computador. 



CURSO DE BASIC E UNGUAGEM DE 
mAquina — Dois cursos numa s£rie de 
capftulos publicados por MICRO HOBBY 
mensalmente, escntos por um de nossos 
assessores tecnicos, Flavio RossEni, atra- 
v£s de uma linguagem simples e bem di 
datica. Aproveitem! 



OS O IT ENT AS - Programas e dEcas que 
podem ser utilizados no computador 
TRS-80, 



POR DENTRO DO APPLE - Uma Eno- 
vagao em nossa revista, pois at4 o numero 
tr6s de MICROHOBBY r nos restringimos 
aos usu^rios do TK, No numero quatro, 
expandEmos para os Apple, contando com 
a colaboracao de outro assessor t^cnico, 
o Prof. Witson Jos£ Tucci. Programas !n- 
teressanttsslmos como a Ampulheta, Ve- 
locidade e Economia foram alguns jd pu- 
blicados. 



PEQUENOS ANUNCtOS - Um espago 
para que vocS possa anunoiar desde aulas 
de datilografia at6 a venda de um compu- 
tador, gratuitamente. d s6 nos enviar o 
anuncio, com nome, telefone eenderego. 



A F1TA DO M£S - Como o prdprio no- 
me da segao ja diz, em cada numero de 
MICROHOBBY, comentamos uma fita 
de programa langado no mercado. Damos 
Enformagoes como: conteudo da fita, 
campos de aplicagao e a melhor maneira 
de utilizagao. 
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A PULGA foi parte da fjta-brinde da 
revista numero 01, por Isso nao teve sua 
listagem incluida enn nossa linha de pro- 
dupao normal, mas apenas nesta edipao 
EXTRA. Rode ser colocado no TK82 e 
no TK 85 e utiliza menos de 2K de RAM. 

0 jogo tern por objetivo fazer com que 
a pulga nao caia nas falhasda pista e 
fuja do fim da tela. Digitando "5" a pulga 
recua urn passo, afastando se assim, do fu 
rial da tela e digitando §t T* a pulga salta, 
salvando-se da fa I ha na pista. Pode-se uti- 
lizar tamb^m o JOYSTICK mas apenas 
o comando para cima e para tras, 

0 jogo termina se a pulga nao escapar 
do fim da tela e se cair numa das falhas 
da prsta, aparecendo na tela os pontos 
que voce fez: na tentativa de ajudar a 
PULGA. 

0 Acionamento do comando RUN de 
0 t^rmino da execuqao do comando 
LOAD, implicam no aparecimento ou 
uma apresentagao do jogo e suas Enstru- 
goes na tela. 

Se desejam gravar o programs conecte 
o MIC do seu TK no MIC do seu grava- 
dor e digite: 

Gcrro 16^ 

Ela executara a instrugao SAVE "PUL- 
GA", gravando em sue fita o programa. 

IMPORTANTE: Eunpoes como: 



0 que b Hexamem? E: um programa es- 
pecffico para se colocar programas em lin- 
guagem de mbquina, a partir de um ende- 
reqo fornecido pelo usuario, 

Porbm, b necessbno reservar uma brea 
da memoria e para Esto devemos mod if i- 
car uma vanavel do programa interpreta- 
dor: A RAMTOP. Esta, serve para indicar 
ao computador, atb qua! enderego a me* 
moria chega; ou seja, nos registros da me- 
mdria correspondentes a essa vanavel, o 
programs interpretador coloca o endere- 
go que seria do byte Imediatamente apbs 
o ultimo byte da memoria. 

A RAMTOP esta cofocada nos ende- 
regos 16388 e 16389, pois sendo ela um 
endereco, tem 16 bits devendo entao ser 
"quebrada" e m duas partes para poder ser 
armazenada, armazenando-se antes 0 byte 
menos significative. Assim digite: 

PRINT PEEK 16388 + (256 * PEEK 
16-389) (NEW LINE) 

Vocb obtbmn o valor da RAMTOP que 
dependera de quanta memoria voce tem 
dispom'vel. 





RAMTOP 


ULTIMO BYTE 
DA MEMORIA 


2K 

16K 


18432 

32768 

1 


18431 

32767 



HND,INKEYj,UflL , PI 



devem ser digitados com o curso em E 
{Shift NEW LINE} pois sao fungoes e por- 
tanto nao podem ser digitadas letra por 
letra. 

S SLOW 

r lei c-nor pi 

1 Ct LLT Y^lNT PI 
is LLT y-V + 

V-Kg-T:-, j a 1 ^ 

^ i.l; ro zii 

If-' RN l £> > * 6 FrN£i HS i 3) < > '■ " TH 
EN LlTT " 

55 print nr v,x; '■ ■■ 

LET +\ - < Ih4KCV£^ ,, 5 , l 

45 It X>Z*$ T Hih ftOTP UHL 1 05" 

5t« pr iut hT 4 . g ; n s ; rt y , X 1 ” *'■ 

5S It- fVjiX-U? ■ TnLN GOTO UA 

L ,, 95" 

60 y.F INKEV 4 = ,i 7-' THEN P9TO UAL 
■'VC- 

65 LET C^C+ 1 

70 GO TO 

75 PRlLT AT YjX; *' " ; f)T UAL "S" 
ual -S' h Xl- ■■ 

60 LtTT tg wu 1, ^ i ' 

> 

GOTO UAL '50" 

0C TAINT AT ^ , 0L "POftfTO-5 i " . C 
96 PnJNT AT 1G.+;'GUTRA TAA7I& 

A ?'‘ 

?«7 IN^UT AS 
93 CL 5 

100 IF THEN 5 

105 STOP 

165 &AU£ ■'PLH.GSI" 

170 RUN j. 
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0 nosso programa ja reserva a memdria 
30000 atd 32767 e isto faz com que H ao 
se colocar um programa em Basic, suas va- 
riaveis e conteudo da tela de TV NUNCA 
irao invadir esta regiao por "pensar" que 
a membria termina no enderego 29999. 
Esta regiao nao sera afetada pelo coman- 
do NEW e nao pode ser passada para a fi- 
ta atrav^s do comando SAVE, a nao ser 
em casos espectais, 

OBS.: Caso voce nao tenha expansao 
de membria use: 

POKE 16388,173 (R eserva a regiao de^ 

POKE 16389, 67 \l7325a 18431 j 

mude tamb^m a linha 30 por: PRINT 
MEMORIA {>= 1 7325} retire as I inhas 
95,100 e de 200 a 580, substitulndo a li- 
nha 105 por PRINT TAB 13; AS (TO 2); 
TAB 17; AUX. 

Agora podemos segulr com o progra- 

V 



ma. Ao ser rodado, ele pede o enderego 
inicial de area a ser reservada (maior ou 
igual a 30,000), 

Este programa fornece, tambem, uma 
"vtsuafizagao" da membria do compu- 
tador na tela da seguinte maneira: 





N9 DA 
MEM. 


CON- 
TEUDO 
DA 
MEM. 
EM Bl- 

nArio 


CON- 

TEUDO 


CON- 

teOdo 


MEM. 


EM 


EM HE- 


EM 




DE- 


XADE* 


DE- 




CIMAL 


CIMAL 


CIMAL 



Assim voc^ podera entrar diretamente 
com os cbdigos hexadecimals, Para exe- 
cutor o que voce introduziu em linguagem 
de mdquina voce deve dar "XS" (executa 
em SLOW) ou"XF" (em FAST} ou sim- 
plesmente P (para o programa sem exe- 
cutar nada). 



O EH^EREE G I 
l $■ ■= 1 “ 



s ftKn hESRMEH 
1 0 

15 PGFE 165S5.il 5 
Sid POKE 1 = 5 = j , LIT 

print -escouHa 

NXCfJlL, £ P - 

39 PRINT "HEHOHlfl 

55 INPUT IN 

to PRINT 

45 PRINT *■ HEMClRiS 

III 

5)5 LET INI- IN 
65 LET R£-’ l+ ' 

60 SCROLL 

=5 print 1, r>£H, 

70 IF p $ j: ~ hJ THEM IriPUT A 

7S IF THEN STOP 

30 IF = THEM GOTO 

65 if R*= i 'XF* t then Garre PILE 
se LET Ft’JX-16iCCiE RJ+COOE R(( 
S) -4?6 

aS LET £16*CCrCE fi*4COI> 

E R5 t2> -470 

109 GO SUE OECD 

105 PRINT THE 13 , C* , S % : TRO 



£ I TO 2 ) ; Tfls 131- 
118 PDKE If4,fiUX 
115 LET 3N=IN+1 
lacs urr ri=hj 13 
125 GOTO QBBB 
139 5LOU 
13S CLS 

i-te PRINT RT 3 .a 
14S STOP 

soe let 1=1 

£35 GO SUB 0530 
SIC LET 1=5 
SIS LET CSsrO* 
220 SC3U0 0SEB 
RETURN 


x s i ;X| 

TO 1 

; USH INI 


Fee 

oea- 


IF C IJ ="0“ 


THEN 


LET 


5 S = " 0 


SOS 

031“ 


IF ID e“l" 


THEN 


LET 


GS="0 


510 
Sio ■■ 


IF 


THEN 


LET 


bs-"c 


515 

an- 


IF nt 1 11 ■”3“ 


THEN 


LET 


SS-'C 


. S2C 

leo" 


IF AS 1 11 


TH^KL 


LET 


5|i"0 


523 

l&I" 


IF Af ID = +i 5" 


then 


LET 




533 

110" 


IF AS IX) =”6" 


THEN 


LET 




535 

111" 


IF AS 1 11 =-~7-* 


THEN 


LET 


□ $="B 


54-0 

aaes" 


IF Rt ill =”S" 


THEM 


LET 


6i = "l 


aoi" 


JF ntdJ 


then 


LET 


h ; = “ 1 


56(5 

013" 


XF AS 111 it "A” 


Then 


LET 


E £ «= " I 


aii“ 

6&fv 

iso- 


IF ASCII = "e ■ 


THEM 


LET 


BS="1 


IF AS 1 11 


THEN 


LET 


E$*"X 


555 
lOl r 


IF PS ( I) ="D" 


then 


LET 


2^"1 


57H 
1 lO" 


IF R$tD s-E" 


THEN 


LET 


BS^l 


575 

111" 

5BC 

535 

6C3 


IF R$tl> o"F" THEN 

RETURN 

STEP 

Sfi'JE ■■HEAKHtS" 


LET 


st=”l 


610 

6£* 

600 


PRINT "CIGrTE BREAK E 
PRU5E 3CG 
GOTO 600 


LIST" 

O 





Este programs 4 do tipo 

que resoNemos denominar ' 'programs- ferramen ta ", 
Um programs desra natureza tem como final idade 
auxiliar o programador a simp f if fear sua tarefa , 



Ao se digitar um programa novo pela 
primeira vez devemos tomar o cuidado de 
deixor posiqoes vazias entre o endereqo de 
uma linha e o da linha seguinte. (Alguns 
prog ram ad ores tfim por habito numerar r 
por exemplo, de 10 em 10.) Jsto £ uma 
atitude prudente ditada L pela Lei de 
Murphy: "Se a Ego tem chance de dar er- 
rado, certamente dara errado". Ao se ro- 
dar um programa rec£m-digitado, fatal- 
mente descobre-se uma por^ao de "gri- 
los' J , cuja eliminagao exige a Insergao de 
novas Einhas, Ap6s varias tentativas, o 
programa esta pronto mas com uma nu- 
meragao que fere o senso est^tico da 
maioria das pessoas. AI6m disso H um bom 
programador envergonha-se desta estra- 
nha numeracao, pois sabe que outro pode 
deduzir os orros iniciais que ele cometeu 
pela numerapao dos "remendos'L 

O programa RENUMERANDO visa eli- 
minar estes Inconven rentes, Jniclalmente 
ele deve ser dlgitado e salvo em f Eta. 

Antes de se digitar um novo programa 
ele deve ser carregado no computed or. Na 
linha 9958 £ conveniente cotocar um 
monte de espaqos vazlos depois do tftulo 
RENUMERANDO. Isto produz um hiato 
entre a retina ja inserida e o programa 
que vocG esta digitando e ajuda a separa- 
gao visual na listagem da tela. 

Voc£ deve ter o cuidado de digitar to- 
dos os enderecos indicados por um GOTO 
ou GOSUB com quatro dfgitos. Por 
exemplo, se no rascunho de seu programa 
voefi tem uma linha assim 



para um programa de IK}, seu programa 
reaparecera numerado a partir da linha 

1000 de 10 em 10. 

Se algum GOTO ou GOSUB estiver fo- 
ra das normas [4 di'gitos), a rotina parara 
e sua linha 9972 indicara, na mensagem, 
em que linha do rascunho isto ocorreu. 

A linha em questao devera entao ser 
corrigida e novamente a renumerapao de- 
vera ser reiniciada por um 



gura mente pronto e retocado, podemos 
numerar de 1 em 1 : 



Al£m disso, e conveniente certificar-se 
de que o computador esteja em FAST an- 
tes de se Iniciar a rotina. 

A unica parte real mente enjoada disso 
tudo e final mente ter de apagar as linhas 
da rotina uma vez terminada a tarefa. Se 
0 programs, por£m, nao estiver absoiuta 
mente per f el to (lembre-se a Lei de 
Murphy I), e nao houver limltacao de me- 
mdria, £ convenient© deixar esta rotina 
pendurada no fim do seu programa ao sal- 
va-lo em fita. Afinal de comas, nunca se 
sabe. . , ! 



Apos um certo tempo de pratica, o 
programador podera dispensar a mensa- 
gem e substituir a Jinha 9972 por 



Neste caso, ao detectar erro, a rotina ja 
colocara o cursor de listagem { ) na li- 

nha a ser corrigida, com economia de 
tempo. 

Se o programa tiver algum GOTO ou 
GOSUB obrigatoriamente fora de norma, 
por exemplo 



-BEC7 RcH fcENUL-iEPRHDO 
LE T UlsifSM 
LET L=ZEB lP£EK 



99B3 If-' L ? =3959 THEM GCT G -3975 
SSL'* LET <*£ + 

1 1 

IF PEEK ^234 THEM GOT 

O 

99GB EC-R I *2 T Q >2 + C 
COG/ IF PEEK 2s^3t< OK PEEK 1=237 
Til EH v-OSLS 99T1 
next i 

£-09 LET Xit^tC+2 
9C7C? GOTO 3951 

^997 4 ^ THEN GOTC 

9^72 PRINT -COMRNE'O EOF? 13 OAS MGR 
NR LXNHfl . " . L 

3973 STOP- 

7r£ K I*SlS--t*T«* ,F + £ H ?* PEer< 
p£|k \lli n 0 " 1 "* PtliK 

99 7*1 RETURN 
i37t. LETT t^iCOO 
9977 LET 

9 970 LOT X£=-:i+2 

9979 LeSSoiP EES Xl+PEEK 



haver^ uma indesejada interrupcao da ro- 
tina. Para driblar sua vigifancia podemos 
usar a Jinha 9965 que pula os REMs. Nes- 
te ceso inserimos um REM no rascunho: 



que devera ser opor tuna mente apagado 
apos a remuneraqao. 

Se quisermos alterar a numeracao da li- 
nha inicial do nosso programa (mantendo- 
a por^m com 4 dfgitos) podemos mudar a 
linha 



Sy&O Xf=- L > =3059 STOP 

LET C=PeiEK +£ j * P . (X2t 

9932 FOR 1 = 1 TO LtN ATfP 3 

933:* IF URL TftltS TO H3i =L Thf 
N GOSUU 5533 
93 F-J NEXT I 

9^33 POKE X 1 . INT iCvSESJ 

V9S3 POKE IX.i +1J * IffT (S/25 

& J 

99^57 LET S = B4iO 
99ejd LETT X 1 
9339 GOTO 997^ 

93PC FDR J = i "?ij4 

9991 POKE (URL T1 II 70 T* 4 3 +U-' * C 
OPE (5Ti?f, El (J) 

9£Kj£ KEXT U 

3993 I.UT BYTEl^lSa t INT (LM B/LN 
StI J 

LEI BYT E3^E> * *5^36 / 12 (1 I BYTE 
1-1231 1 

9335 L!iT H=.VPt_ T t- c 7 TO 
993S POKE H+e - BYT *L 1 

39&7 POKE H+7 . INT (QYTE2/2SG) -1? 

3 

^333 POKE n+B,BYTE2-255*JNT ( BYT 

9939 RETURN 



ela deve ser digitada assim 



997B LET B=10QO 



usando valores de B maiores que 1000. 
Podemos tamb^m alterar a linha 



Uma vez digitado o rascunho do pro^ 
grama, basta comandar 



GOTO 3959 



alterando com Isto o incremento. Gueren 
do esnobar em cima de um programa se 



que, ap6s um certo tempo (30 segundos 
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ANTI-MSSIL 



Muitos de nossos lei tores possuem outros mi- 
crocomputadores que usam uma Idgica compati- 
vel com a do TIC Alguns deles, como os prime!- 
ros model os do NEZ8000 da Proldgica ou ZX31 
da SINCLAI R tfim apenas 1 K de RAM. Para eles 
estamos publicando este programa que 4 uma ver- 
dadeira acrobacia em termos de economia de me- 
mdria, 

A digitagao deste programa tern entao duas 
utilidades: uma £ o prdprlo programa em si, que 
gera urn joguinho divertido {dentro, £ 6bvio,das 
limitagoes de memdrla}, 

Um mi'ssil (V) desce segundo uma trajetdria 
que sofre desvios aleatdrios. Voc£ comanda um 
anti mi'sstl terra-ar {+) que deve destruir o mi's- 
si I, No fim do jogo aparece o numero de mt'sseis 
destrufdos. 

Para guiar seu anti-mfssll, voc£ usa as teclas: 

54- 6| 7f B-* 

ou seu joystick. 

A outra utilidade <§ o aprendizado de alguns 
'Truques" para economizar memdria. 

Ao digitar 

GOTO URL. 

ao Envds de 

GOTO 20 

voc£ esta eeonomizando 3 bytes! 

Da mesma forma, ao fazer 

XfcPXyPX 

ao inv#s de 

x*i 

voc§ livra 4 bytes. 

Para se convencer disto H antes de digitar o 
ANTi-Ml'SSIL # digite o seguinte programinha: 

x GOTO 2 

£ PRINT PEEK 164^4 +2S6 1640 
5-1&51P 

Ele Indica, na tela, quantos bytes de memdria 
o programa esta ocupando. Anote o numero indi- 
cado e mude a finha 1 para 

1 GOTO URL "2 + ' 

Compare o numero de bytes ocupados agora 
com o valor obttdo anteriormente. 

Os prime! ros modelos do NEZ8000 e do 
TK82-C nao tinham SLOW. Por isso, quem tern 
too radar o programa BARAO VERMELHQ do 
n? 0 num destes equipamentos deve ter notado 
que nao funciona, a men os que se cotoque uma 
Inst rugae; 

PRUSE 30 

ap6s cada instrugao PRINT. 

No programa ANT I -MISS I L este cuidado tam- 
tam # ind is pen save I se seu computador nao tiver 
SLOW. For isso acrescente a t in ha 

12 PAUSE 3® 

Haver# o inconveniente da tela ficar piscando, 
mas assim r mesmo voce poder# jogar e se divertir. 
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OBR&H hlCftOHODDY PO 
i row h_[ j.i-'j: if ohl "9“ 

£ LET fl r\f & L '■2 , C'“ 

3 LET tJ-yr.C 1 1 L 
* LtT 

6 LUT VcU 

fa KCJR FbPI-PI TO UAL ' &3 

7 PLOT F .PI -P t 
& NCXT f= 

ci print at 
lO P^INT fir X/Y * "V " 

13 PR INI RT fi , B; " ’■ 

Ifa LET Z'INT fRNOt-UPL "3’M 2 

16 LET X-X+l 

LETT Y=Y + “l + 'l ^ fZ^VRL 

"C" V 

1C IF INKCY THEM LEY 

19 LET i INKFV*= B"J - I INKEY 

*=‘ + S‘- 1 

30 LET Pltfi- riNXrY*»' h, 7"l 

31 ir fl’X firm &*»Y on xv=aa thje 

N GOTO UfiL ‘S3 + ' 

32 CQTO UAL "9” 

S3 CLS 

3A IF THEN NEXT N 

ES IF X*OAL *EE" THEN PRINT H 
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PENTASPEED 



Muitos fet Ezes possuidores de urn TK82 
eomeparam a ser rofdos pefo verde mi- 
crobto da inveja quando viram um TK85 
gra'vando e lendo programas a uma veloti- 
dade incn'vel, usando o HIGH-SPEED, Es- 
ta inveja se torna mats intensa quando 
percebem que nao se trata $6 de alterar a 
veiocidade de transmissao de dados, mas 
sim de acrescemar filtros e ampltfica- 
dores, 

Para amenizar esta inveja es tamos pu- 
blicando um "paliativo": o PENTA- 
SPEED Como o nome sugere, o PENTA- 
SPEED e uma rotina (em ASSEMBLY) 
que permite ter e gravar programas com 
uma veiocidade ctnco vezes maior que o 
usual. 

Esta veiocidade £ suficiente alta para 
vaJer a pena o trabalho de inserir a rotina 
no computador com 16K, mas suficiente- 
mente baixa para nao exigir nada stem de 
um gravador razo^vei e fita de boa quafi- 
dade. 

Inlcialmente digitamos o programa A 
da fig, 1, tomando o cuidado de inserir 
pelo menos 282 "zeros" na linha 1 REM 



Ao terminar esta tarefa apague todas 
as I in has do programa A, menos a 1 REM r 
agora toda chela de uma estranha sequ§n- 
cia de caracteres. A seguir digiteas linhas 
de 10 a 70 do programa B (fig r 3). 



LISTHGCh Dl)S ENC-ERECO& E COt>IGOS 
DF * ROTlHfl PENTfi5PEED 
PfiftR INSERIR Nfi LIHHR 1 REH 



16514 
i&s i 

105*0 

i 

1 6 *j 4 

l&L ns 

1 

1653G 
i55?e 
1634 Q 

169** 
165*6 
1&S10 . 
16^50 . 
leu^s , 

109 £ * , 

16530 , 

is35a . 
ltisto, 
16S5G. 
16064 . 

. 

16579. 
16S73. 
16571 . 
16576, 
16578 . 
16G60 , 
1BPJ2. 

leesi , 
10533, 

1&599 . 
16563. 
16591 , 
16596- 
16596. 
166Q0 . 
16032 . 

;seo* . 
16606 - 
16636 * 
16610* 
16613, 
166 14 * 
16616 , 
16610 . 
L602O* 
16633, 
‘L6624 . 
16536, 
16623 * 
16SJG, 
16533, 

16634. 
16630 . 
16636, 
1654-0 . 
16642 . 
16*44 . 
16646. 
1064-0 . 
16050. 
16652 . 
16654 . 
16656 • 
16656 . 
16650* 
1605£_ 
16664, 
16606, 
16050, 
16670 . 
1667R. 
16574 , 
16676 . 
16670 . 
15630 , 
16632. 
16634 . 
16636 . 
16630. 
16690, 
16092, 
1669* . 
16696, 
166-70 . 
167O0 . 
16703 . 

16 704 . 
16700, 
16703, 
JB71G. 
16712* 
16714 . 
16716 . 
16713, 
10720. 
15722. 
16724 , 
16726- 
167.^6, 
16730 . 
IS733 . 
1673* , 
16736* 
16730 * 
16740* 
10742 - 

1 67*4 . 

16746. 
16 '4 5 , 
16750 * 

1 67S2 . 
1675 + . 
16750 . 



165 15 
16517 
ivM£ 
1652 1 
16523 
16 r i23 
16 5.77 
16 '.>2 9 

1077 .1 
15530. 
165 35 
1652 7. 
16539 
1654 1 . 
16543 . 
1 6546 . 
1054-7 , 
163*9 , 
3.6001 . 
16553. 
10565. 
16567. 
15559. 
16561 . 
10 56 3. 
16565 , 
16567 . 
16569, 
1657 1 . 
10573, 
1607S. 
16377 , 
16579 , 
16501 . 
16563 * 
16555. 
16507. 
1658? . 
16591 - 
16593. 
16595 . 
16597. 
16599. 

1600.1 , 
16603, 
16605, 
16607* 
16500, 
1061 l * 
16613 . 
16015 , 
i R q. 1 7 , 
16619, 
16621 , 
16023. 
16025. 
16027. 
16629, 
16031 . 
10633. 
16635 . 
16 037* 
16630* 
16641 , 
16643* 
16645* 
16647 . 
16649, 
10651 * 
16653 * 
16635* 
16057 . 
16650. 
10661 . 
16063, 
16663 - 
16667 . 
16669 . 
16671 , 
16673 * 
16675. 
16677* 
16679, 
16631 , 
16063, 
10695. 
10637, 
10639- 
16601 . 
16693. 
1 * 
16697. 
10C93, 
16701 . 
16703* 
16705* 
16707. 
10709. 

16711 , 
1G713. 
10710. 
10717* 
16719, 
167*7 1 * 
16723 . 
16720. 
10727. 
16729 , 
16731 . 
16733. 
10703* 
10737. 
16739. 
1674 1 * 
16743, 
16 7*3 . 
16747. 
10749* 
10731 , 
16 753 . 
10755, 
10737. 



1 REM L«. 77J^35_N FCft*t4 FTTFlN L 
n ??5m-nJiRLn tESlw F-mN i *“- 

LW R HM O FOP ) HC^ >LN 7 7KI 

f RETURN -7J£4 POKE LN ^-iC3 RNOL 
N ?BLN UNPLOT * / 5fiU0 7RTiCS <CG5 
B HEU "LEH. **?!>££* COPY f7< RHXU 
ftN LM r?K*?/a( RETURN $4 INPUT ^ J 
STEP UN >ttc£ W UN r C 

U& Yffts RETURN PEEK COPY 3K ^ 

* *3C t LP.T LET S-CPS FP6T Bi) ^LN 
ACS ??^?4CNR( 7+K LET CLEAR 0 + 5 
mRNDTLN “^"LN UNPLOT * / PLOT STR 

* £L/;l<t RfcTURN rflCS ?-*5 PRIIlT 

c PRINT SC-N Am RETURN ?3-.^2f1C5 >K 

£S>? t petlirn 

NO) JEF STEP 60HUB |^S COPY 

0 006 OO 6 60 (3 C j 660 G 60 Q G Ci OO 9 0 O O 0 OG OCH3 

06 

10 SRVE " Pt’NTnSPEEO ■■ 

,20 PRINT TfiD 6, 
jji. T i t-iN 

30 PRINT *’P^ OJ^FlURR DICI 

TE R fit JO U5R 32512“ 

40 PRINT “P/CfifiPECfiR PIOITE Rfi 
NO U5P 32525- 

00 PRINT " PflRR GUARIAR E3TP RQ 
TlNfl NO FIH Dfi ROM DJCXTE PURLOU 

er uFrrRfi" 

60 PAUSE 40000 

70 RAND U5R 1673S f: n 9 



Prepare uma boa fita, coloque o grava- 
dor na po$iC30 gravar e comande RUN. 
O programa B vai se gravar (devido a linha 
10) e a seguir j£ se inicla (fig. 4). 



1 ftfth 0006 3000 OOP OP 9 CIO 

0 09 90 0 9 3 0 ^ ' 09 O O 090 9^ ■■ O O 9 9 9 9 P 9 
O 09 09 COO O 9 1 1 9 OP OOOOOC ; 9 9 O O O 9 0 O 9 9 
09 99 9 9 9 ft O 0930909 s' 9 9 O 0 C 9 0 s'L' O s' 9 9 09 
09 (lOCIOOOiU'i 9 909 C 9 s^ 9 9 9 C i 9 9 O 9 O O 9 O 09 
09 09 09 s 1 09 9 nO-J O h ' 9 ■ ' 9 9 O . ‘ , ■ ■ s' 9 9 s' s' 9 090 
09 00090 si 9 99 3 !’ 000060099C 090990000 
00009099 99siOOOCl000000999996ip90ClO 
OOOOOOs'GOOUOUOOOOOOL' 009000909090 
090 

19 PRINT "ENDEPECO INICIRU?'"; 

29 INPUT E 

39 PRINT U 

JO FPR Inti TO 10707 

50 SCROLL 

60 PRTm T; " * . **'j 

70 INPUT V' 

6 B PRINT P 
OO POKE J . P 
199 NEXT I 
110 &GROLL. 

120 PRINT “FIM" fin 1 



P 7 CRfiuRR DlGItE RPND USR 32512 
P/CflRREGAR OXCITE RfiMP USR 3252! 
PflPR GtiflPOflR E5TR POTlNfl NO flM 
Dfi Rfift DIGIT6 OUfiLtJUER LcTRfi 



fig- 4 

Ao digitar qualquer letra.o programa 
abalxa o valor da RAMTOP de uns 250 
bytes e transfers para esta regiao reserva- 
da o codigo de m^quina contido na linha 
1 REM A seguir o programa se autodes- 
tr6i H e o computador fica com a RAM 
aparentemente vazia. Nao se assuste: a ro- 
tina esta escondidinha no topo da RAM e 
a unica maneira de tk^-la de e desligar 
o computador. Pegue uma qualquer de 
suas fitas ja gravadas e passe um programa 
para o computador. A seguir coloque uma 
frta virgem no gravador, digite: 



40 
24 JL 
166 
23-J 
03 
205 
t^7 
l.T!5 
3^ 
190 
214 
A 3 
24 1 

32 

33 
84 
^08 
127 
£06 



A veiocidade deste programa nao 4 
compativel com o HIGH-SPEED, nao per^ 
mi tindo aproveitamento de fitas gravadas 
nesta veiocidade. Em compensapao ele 
pode ser carregado num TK85 ( que pas- 
sara a ter 3 oppoes de veiocidade de trans- 
missao de dados. 

Ao rodar este programa ele pede o en- 
derego initial. Devemos digitar: 



RfiND USR 32512 



Coloque a fita rodando com o grava- 
dor em REC e digite NEW LINE. Seu pro- 
grama estd sendo passado para a fita em 

PENTASPEED 

Rebobine a fita, digite: 



a seguir toda a lista de codigos decimals 
da fig. 2. 0 programs, atrav£s do POKE 
da linha 90 ira substituindo os “W‘ da li- 
nha REM pelos bytes da rotina em lin 
guagem de mdquina, 

Se voc£ error aigum byte nao tem pro- 
blema: digite STOP e NEW LINE inter- 
rompendo o programa. A seguir comande 
RUN e indique como enderego Inlcial o 
dltimo em que vocG digitou corretamente. 



e NEW LINE. 

Ao passar da fita para o computador 
um programs de 5 minutos demorard ape- 
nas 1 minuto. 



195 

3 



6 MICROHOBBY 







SOMA SINTATICA 



i 

■f 

■*3 

t5 

-7 





O 

y 




/ 

Gtaucus Bretaz 



Ao se teciar um programa em um 
TK82, 83 ou 85 e apos carrega-lo em fits, 
sempre resta ao usu^rio uma indagapao: 
"Como saber se todo o programs foi te- 
clado corretamente ou se a transference 
da fita para o computador foi perfei- 
ta?'\ . , A verdade 6 a seguinte; Mesmo 
que apenas um caractere seja confundido 
ou apenas um bit alterado durante a car- 
ga r estes sao motivos suficientes para que 
o programa seja executado com erro, ou 
at£ mesmo nao rode na maquina. 

A forma que propomos para conferfr 
o conteudo da memoria e a Soma SintSti- 
ca (efetuada apos o programa ter si do te- 
ciado ou carregado da fita). 

A Soma Sintatica, consiste na adigao 
dos valores de todos os bytes de um pro- 
grama que fornecera um total tal, a ser 
checado todas as vezes que o programa 
for carregado. Nos nossos programas, a 
partir do numero seis de Microhobby — 
passaremos a informar a Soma Sintatica 
de cada programa, que devera ser conferi- 
do com o valor fornecido pelo seu com- 
putador. 

Como o programa que executa a Soma 
Sintatica nao deve alterar o conteudo do 
seu programa original, optamos por faz£- 
lo em linguagem de maquina, o que nos 
da ainda a vantagem de uma maior rapi- 
dez de execugao. Ademals, impomos tr§s 
condigoes para a execugao de um progra- 
ma; 

1. O programa nao podera estar em uma 
sentenga REM, pois muitos programas em 
BASIC, utilizam subrotinas em mdquina 
no REM (Enderego 16514). 

2 . 0 programa nao estando na 3rea de 
memdria destinada ao BASIC, deve ser 
providenciada uma maneira de salva-lo 
em cassete. 

3. 0 programa devera ser recolocado na 
rnemdna, de forma a ser utilizado em 2 t 

16 ou 64 K RAM. 

Decidimos entao, colocar o programa 
dentro de uma sentenga REM, transferin- 
do-o para uma localizagao de memorises- 
colhida acima dadrea reservada ao BASIC. 



Para criar sua fita com a fungao Soma 
Sintatica, voc£ deve execuiar os seguintes 
pass os: 

1. Tecle o programs de listagem 1 para 
carga de codigo hexadecimal 



LI5TRGEH - 1 

C* n c p u h j o ^ p i> o o ; ' u o o o u- ou u u o o 9 o C 1 u c > e 
O oi? 0 U 0O OOP OU U 5l U OO OU O t? o O P L' 0- L'O p O Q 0 

ocoaooo 

20 uCT Mv-‘" 

3tl L ITT X-tUSl* 

4 0 IF ThCN IK^'jr X s 

53 IP X* ( ?. l =“&" THf« 

eo print to £i;- 

70 POKE S^ ( (ibiCODE Kt+CiOCE X* t 
SJ -4 701 

GO LCT X'-X+l 
go LET Xf=x»t3 TO J 
100 GOTO 



2. Execute o programa dando entrada no 
cddigo hexadecimal da listagem 2. 




Em caso de erro, recomece a segunda 
eta pa. 

3. Tecle POKE 16610,0. NEW LINE. Seu 

programa aparecera como a listagem 3. 



.LX&trgem - 3 



PJ3REH LN Z?S?RND -?£RND 

CLEfiP S LN I-JRNDE tRNEJ OO-^UB 1 stRI t 
£>.LN EftND CLEAR FIRST CLEAR 5 RNO 
LN F7R T TAN FACT G05L^ 7 LPRIR 
r ?»* CL.F.n^ p-hmsc 53 go 

SUE PND. CLEAR Si'lPNT- Ci r ErRR ' 7 * 
CLEDR ■? * CLtAfl 7£ CL ^ s 

s nwosiiPNO- p po?ub ii gobub r 

NDTUN 

20 LET X*= - ' 

30 I ET X=1651i 

40 IF KS-” THE« T^ir LfT Tt 
50 IF XJ1II=“S J THEN ?TOP 
60 PHirJT X* [l TO Pi : r 
70 POKE X, U6*CO[>E X*+COM XJt ( 
21 -47E>1 

SO LETT X=XU 
90 LETT Xj=X*f3 TO > 

10O GOTO 40 



Apague as ftnhas 20 a 100 e tecle: 







LI5TAGEH - 4 




"SOMA'" 




PRINT 


"SOHA 6XNTRT XCfl = “j U5R 


1G5 14 




3C 


PR I F-FT 


“C3NFERF? 


49 


if iNKeY5= ,, s , ‘ Tueri goto bo 


SLi 


GOTO 


A 0 


60 


PR TNT 


"SOUR 0 1 NT RT J Cfl NO EN 






79 


INPLT 


RTF 


se* 


POKE 


1GBG9 , TNT ( F-tT Py2561 


90 


POKE 


ISaaE ,R TP ■ I NT t RT Ry* 2Et) 


1 






3 09 


PRINT 


U6R 1566.’ 


1 io 


IF = + THEM GOTO 110 


120 


N£U 






4. Salve a versao final da Soma Sintatica, 
teclando RUN. Assim ela estara proma 
para ser usada. 

A versao gravada na fita, ao ser lida 
corretamente, devera mostrar a seguinte 
mensagem: 

COH.l SINTfVrXCR — 25S2S 

Para usar esta mensagem, tecle oende 
rego para o qua I voce quer baixar o RTF 
— Ex r : "Se voc§ tern 16K* 30000" — o 
programa responders com o mesmo valor. 
A Soma Sintatica sera entao obtida com: 

PRINT USR (endereco que 
voc£ escolheu). 

Lembre-se agora de carregar a fita 
"SOMA" antes de teciar ou carregar seu 
programa. Apos informar o endereco fini- 
te da mempria utilizada, tecle qualquer 
tecia para limpar a area do BASIC. 

Conv^m observer que a Soma Sintatica 
checa o programa e as va nave is — caso 
elas existam e portanto deve ser usada 
imediatamente apos a carga do seu pro- 
grama. 

Em programas que iniciam rodando 
apos a carga, e conveniente proceder co- 
mo esta especificado abaixo: onde XXX, 
YYV e ZZZ sao Ernhas do seu programa: 

1 PRINT "SOMA SINTATICA = 

2 PRINT USR (endereco escolhido) 

3 PRINT "CONFIRA E TECLE NEW 
LINE PARACONTINUAR" 

4 PAUSE 6EA (6 x 10 4 ) 



Seu programa 



XXX STOP 

YYY SAVE “Nome do seu programa" 
ZZZ GOTO 1 



Ao salvar seu programa, anote a Soma 
Sintatica junto ao nome do programa, no 
rotulo da fita. Caso o programa, ao ser 
carregado, nao d£ o mesmo valor, car- 
regue-o novamente. 
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ASSINATURA 

A nossa revista nao ser^ distribuida nas bancas. 

Para obter seu exemplar mensal, contendo muitos 
programas para o seu TK, muitas dicas e premios 
interessantfssimGS, voce devera fazer uma assinatura: 
o prepo anua! da assinatura £ de Cr$ 14,800,00. 

Pordm, at£ 30 de outubro, manteremos o prepo de 
CrS 1 1 .800,00, com dircito a uma fita inedita de jogos: 
Sao Paulo (I K) 

Mansao Maluca ( 1 6K) 

cujo valor comercial 6 superior a Cr$ 6.000,00. 



Para tanto, voce devera preencher corretamente 
o cupom anexo, coloca-lo num envelope, junto a urn 
cheque nominal ou vale postal a favor de MIC ROM EG A 
PUBLICAQOES E MATERIAL DIDATICO LIDA., no 
valor de Cr$ 1 1 ,800,00 (oferta valida at£ 30 de 
outubro) ou CrS 14,800,00 ap6s esta data. 

O envelope devera ser selado e enderepado a: 



MICROMEGA P.M.D. LTDA, 
Caixa Postal 60081 — CEP 05096 
Sao Paulo — SP 



No verso do cheque escreva: 



"Destina-se ao pagamento de uma assinatura 
(12 ndmeros) da revista MICROHOBBY". 



Quando este cheque for devolvido ao seu Banco 
com nosso endosso, servir3 de comprovante provisdrio 
que nosso recibo seja enviado pelo correlo. 







COMO 

FAZER 

SUA 




s para voce utilizer melhoroseu micro. 

82c,TK83,TK85, NZ 8000, CP 200, ZX81e TIMEX W00). 



COLECAO DE 
PROGRAMAS 

VOL I 



CCIRSO DE JOGOS 
EM BASIC TK 






Wj 



=111 



doi s volumes. 



deixe de lerestes livros. 









Sim, quero receber os livros 



Nome: 



Endereco 



& 










O micro computador que poe 
seus negocios prof isslonais 
e particulares em dia. 



Maxxi possui grande versatllidade eassegurada possibilidade 
deexpansao. Compativel com APPLE 1J PLUS*, 
aceita mais de 5 mil program as aplicativos, dispomveis no 
mercado. 

Em seu escritorio ou em sua casa, o Maxxi trabalha com muita 
cornpetenda. Poe em dia seu planejamento fmanceiro e sua 
administragao* E extrema mente util em calculos, controles e 
operagoes nas areas de engenharia, medictna, odontologia, 
educagao, de pesquisa, de servigos e no treinamento de 
profissionais e executives, entre outras. 

Trabalha por voce no controle de sua conta bancaria, no seu 
imposto de renda, no seu orgamento domestico e ate auxilia 
no estudo de seus filhos, gragas a inumeros programas 
educacionais. Mais ainda: o Maxxi e tambem uma fonte de 
diversao com seus Inumeros jogos eletronicos. 



* Outros produtos da Poly max: 

* POLV 301 WP (Poiyscriba) 

* POLY 201 DP * POLY 105 DP 

* POLY 201 DE * POLYNET 



Caractensticas tecnicas basicas do Maxxi 
Microprocessador 6502 

* 48 kbytes de memoria disponiveis para o usuario. 

* 12 kbytes de membria residente com o sistema operadonal. 

* 8 Slots para interlaces externas. 

* Saida para TV a cores, sistema PAL-M. 

Perifericos e acessorios disponiveis 

* Unidade de drives de disquetes de 5 

* Gravador. 

* Impressora serial de 90 CPS com 80/132 colunas. 

* Placa serial de comunlcagao tipo RS - 232 C. 

* Placa de expansao de memoria RAM para 64 kb. 

* Placa de CPU Z-80 (sistema operadonal CP/MK 

* Placa Videx expansora do video de 40 para 80 colunas. 

» Modulador de R.F. 

* e outros. 
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Apaixonado por cibernetica 
procura parceiros. 




PERSONAL COMPUTER 




function 

new 

line 



/HICRODIGIMI 




Viga Continue 



Tenho grandes recursos sou compacto e muito 
fact i de usar (deve ser por isso que eu sou o computador 
pessoai mats conhecido do mercado brasifeiroh 

A judo voc&a resolver sous assuntos profissionais e 
domestic os, £ posso jogar com vocS centenas dejogos . 

£ tenho tamb&m cara c ter is ticas muito avangadas: 
tec fa do tipo mdquina de escrever, high-speed, e a funcao 
verify (para sua segu range ao guardar seus prog ra mas e 
dados em fita cassete). 

Venha me conhecer, Eu posso ser o seu parceiro idea / 
por muito tempo , 

Outras caracteris ticas tScnicas importantes: 

* Linguagens Basic e Assembler 

* 16 ou 48 K bytes de membria RAM 

* 10 K bytes de ROM 

* 40 tec/as com 160 fungbes 

* Gravagao de programas em fita cassete comum 

* input e output de dados 

* Video: TV PBB ou cores 

* Fungbes especiais para gravagao em 
High speed ! 4200 8 A UDS ) 

* Possibiiidade de acopfar Joystick 

* Possibiiida de de acoplar impress ora 




TKALC 




Computador Pessoat TK 85 




Microdigitat Efotrdmca Ltda. 

Caixa Postal 54088 CEP : 01000 ■ Sao Paulo - $P 



A vends nas boas cases do ramo, lojas especializadas da 
to to- video so/ 77 , e grandes magazines em: A LA GO AS - Ma- 
cei6, Paimaira dos Indies, AMAZONAS ■ Manaus, BAHtA - 
Salvador, GEAR A Fortaleza, DISTRITO FEDERAL - Brasilia. 
ESPfRiTO SANTO Vit&ria. GOlAS Goidnie, MATO GROS 
SO Cuisbd, MINAS GERAIS Bela Horizonte, DMnbpotis, 
Itajubd. Juiz da Fora, Popes de Caidas, $So JoSo Dal Ret, 
Ted fib Otont, U be rid n die, Uberaba, Vn;osa. PARA/BA - 
Campina Grande, PARA - Bebm, PARANA - Curitiba, Lorn 
drina. Mazing#, PERNAMBUCO - Racrfa, RIO DE JANEIRO - 
Campos, Niterbi, Nova fflburgo, Patrdpolis, Resends Rio de 
Janeiro, Votta Rad on da, RIO GRANDE DO SUL - Bag 6. Ca- 
noes, Caxias do Sul, Ijuf, Nova Hambutgo, Petotas. Porto 
Alegre, Sant Anna do Lrvramento, Santiago , Santa Rosa. 
SfioLeopoido, RIO GRANDE DO NORTE Natal, RONDON/A - 
Porto Velho, SAO PAULO ■ Araraquara. Assis. Avar 4, Bauru 
Birigui, Botucatu, Campinas, Cetenduva, Franca. Guam lb os, 
ltd, Jeceref, Jsu, Limeira. Lins, Manila, Mogi Guaqu, Mogi 
das Crozes, Ourinhos. Piracicaba, Pfnssttmmga, Promiss&o. 
Rio Ciaro. RibeirAo Prato. Santos. Santa Barb. D'Oeste, S3o 
Bernardo do Campo, SSo JoSo da Boa Vista, S&o Sabas da 
Grama. SAo Carlos, SSo Jos# do Rio Preto. SSo Jos# dos 
Campos , StFAndr #. SSo Patdo, Sorocaba, Suzano, Taubate. 
SANTA CA TARfNA Blumenau. Brusque FiorianOpoHs Its 
/at, Joinvifle. 

Se voc# nAo encontrar aste equipamento na sua cidada ligue 
para (80Q1 2S6.8583. 





